3.3.90 \(\int (a \cos (e+f x))^m (b \csc (e+f x))^{3/2} \, dx\) [290]

Optimal. Leaf size=76 \[ -\frac {b (a \cos (e+f x))^{1+m} \sqrt {b \csc (e+f x)} \, _2F_1\left (\frac {5}{4},\frac {1+m}{2};\frac {3+m}{2};\cos ^2(e+f x)\right ) \sqrt [4]{\sin ^2(e+f x)}}{a f (1+m)} \]

[Out]

-b*(a*cos(f*x+e))^(1+m)*hypergeom([5/4, 1/2+1/2*m],[3/2+1/2*m],cos(f*x+e)^2)*(sin(f*x+e)^2)^(1/4)*(b*csc(f*x+e
))^(1/2)/a/f/(1+m)

________________________________________________________________________________________

Rubi [A]
time = 0.08, antiderivative size = 76, normalized size of antiderivative = 1.00, number of steps used = 2, number of rules used = 2, integrand size = 23, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.087, Rules used = {2667, 2656} \begin {gather*} -\frac {b \sqrt [4]{\sin ^2(e+f x)} \sqrt {b \csc (e+f x)} (a \cos (e+f x))^{m+1} \, _2F_1\left (\frac {5}{4},\frac {m+1}{2};\frac {m+3}{2};\cos ^2(e+f x)\right )}{a f (m+1)} \end {gather*}

Antiderivative was successfully verified.

[In]

Int[(a*Cos[e + f*x])^m*(b*Csc[e + f*x])^(3/2),x]

[Out]

-((b*(a*Cos[e + f*x])^(1 + m)*Sqrt[b*Csc[e + f*x]]*Hypergeometric2F1[5/4, (1 + m)/2, (3 + m)/2, Cos[e + f*x]^2
]*(Sin[e + f*x]^2)^(1/4))/(a*f*(1 + m)))

Rule 2656

Int[(cos[(e_.) + (f_.)*(x_)]*(a_.))^(m_)*((b_.)*sin[(e_.) + (f_.)*(x_)])^(n_), x_Symbol] :> Simp[(-b^(2*IntPar
t[(n - 1)/2] + 1))*(b*Sin[e + f*x])^(2*FracPart[(n - 1)/2])*((a*Cos[e + f*x])^(m + 1)/(a*f*(m + 1)*(Sin[e + f*
x]^2)^FracPart[(n - 1)/2]))*Hypergeometric2F1[(1 + m)/2, (1 - n)/2, (3 + m)/2, Cos[e + f*x]^2], x] /; FreeQ[{a
, b, e, f, m, n}, x] && SimplerQ[n, m]

Rule 2667

Int[((b_.)*sec[(e_.) + (f_.)*(x_)])^(n_)*((a_.)*sin[(e_.) + (f_.)*(x_)])^(m_), x_Symbol] :> Dist[b^2*(b*Cos[e
+ f*x])^(n - 1)*(b*Sec[e + f*x])^(n - 1), Int[(a*Sin[e + f*x])^m/(b*Cos[e + f*x])^n, x], x] /; FreeQ[{a, b, e,
f, m, n}, x] &&  !IntegerQ[m] &&  !IntegerQ[n]

Rubi steps

\begin {align*} \int (a \cos (e+f x))^m (b \csc (e+f x))^{3/2} \, dx &=\left (b^2 \sqrt {b \csc (e+f x)} \sqrt {b \sin (e+f x)}\right ) \int \frac {(a \cos (e+f x))^m}{(b \sin (e+f x))^{3/2}} \, dx\\ &=-\frac {b (a \cos (e+f x))^{1+m} \sqrt {b \csc (e+f x)} \, _2F_1\left (\frac {5}{4},\frac {1+m}{2};\frac {3+m}{2};\cos ^2(e+f x)\right ) \sqrt [4]{\sin ^2(e+f x)}}{a f (1+m)}\\ \end {align*}

________________________________________________________________________________________

Mathematica [A]
time = 5.43, size = 94, normalized size = 1.24 \begin {gather*} \frac {2 a b (a \cos (e+f x))^{-1+m} \left (-\cot ^2(e+f x)\right )^{\frac {1-m}{2}} \sqrt {b \csc (e+f x)} \, _2F_1\left (\frac {1}{4} (3-2 m),\frac {1-m}{2};\frac {1}{4} (7-2 m);\csc ^2(e+f x)\right )}{f (-3+2 m)} \end {gather*}

Antiderivative was successfully verified.

[In]

Integrate[(a*Cos[e + f*x])^m*(b*Csc[e + f*x])^(3/2),x]

[Out]

(2*a*b*(a*Cos[e + f*x])^(-1 + m)*(-Cot[e + f*x]^2)^((1 - m)/2)*Sqrt[b*Csc[e + f*x]]*Hypergeometric2F1[(3 - 2*m
)/4, (1 - m)/2, (7 - 2*m)/4, Csc[e + f*x]^2])/(f*(-3 + 2*m))

________________________________________________________________________________________

Maple [F]
time = 0.10, size = 0, normalized size = 0.00 \[\int \left (a \cos \left (f x +e \right )\right )^{m} \left (b \csc \left (f x +e \right )\right )^{\frac {3}{2}}\, dx\]

Verification of antiderivative is not currently implemented for this CAS.

[In]

int((a*cos(f*x+e))^m*(b*csc(f*x+e))^(3/2),x)

[Out]

int((a*cos(f*x+e))^m*(b*csc(f*x+e))^(3/2),x)

________________________________________________________________________________________

Maxima [F]
time = 0.00, size = 0, normalized size = 0.00 \begin {gather*} \text {Failed to integrate} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((a*cos(f*x+e))^m*(b*csc(f*x+e))^(3/2),x, algorithm="maxima")

[Out]

integrate((b*csc(f*x + e))^(3/2)*(a*cos(f*x + e))^m, x)

________________________________________________________________________________________

Fricas [F]
time = 0.00, size = 0, normalized size = 0.00 \begin {gather*} \text {could not integrate} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((a*cos(f*x+e))^m*(b*csc(f*x+e))^(3/2),x, algorithm="fricas")

[Out]

integral(sqrt(b*csc(f*x + e))*(a*cos(f*x + e))^m*b*csc(f*x + e), x)

________________________________________________________________________________________

Sympy [F(-2)]
time = 0.00, size = 0, normalized size = 0.00 \begin {gather*} \text {Exception raised: SystemError} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((a*cos(f*x+e))**m*(b*csc(f*x+e))**(3/2),x)

[Out]

Exception raised: SystemError >> excessive stack use: stack is 6436 deep

________________________________________________________________________________________

Giac [F]
time = 0.00, size = 0, normalized size = 0.00 \begin {gather*} \text {could not integrate} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((a*cos(f*x+e))^m*(b*csc(f*x+e))^(3/2),x, algorithm="giac")

[Out]

integrate((b*csc(f*x + e))^(3/2)*(a*cos(f*x + e))^m, x)

________________________________________________________________________________________

Mupad [F]
time = 0.00, size = -1, normalized size = -0.01 \begin {gather*} \int {\left (a\,\cos \left (e+f\,x\right )\right )}^m\,{\left (\frac {b}{\sin \left (e+f\,x\right )}\right )}^{3/2} \,d x \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int((a*cos(e + f*x))^m*(b/sin(e + f*x))^(3/2),x)

[Out]

int((a*cos(e + f*x))^m*(b/sin(e + f*x))^(3/2), x)

________________________________________________________________________________________